// This example shows how to specify additional host name(s) for the server. This is useful when the server is running on a // computer that has multiple host names, and you want to make the server accessible under them. // You can use any OPC UA client, including our Connectivity Explorer and OpcCmd utility, to connect to the server. // // Find all latest examples here: https://opclabs.doc-that.com/files/onlinedocs/OPCLabs-OpcStudio/Latest/examples.html . // OPC client, server and subscriber examples in C# on GitHub: https://github.com/OPCLabs/Examples-OPCStudio-CSharp . // Missing some example? Ask us for it on our Online Forums, https://www.opclabs.com/forum/index ! You do not have to own // a commercial license in order to use Online Forums, and we reply to every post. using System; using OpcLabs.EasyOpc.UA; using OpcLabs.EasyOpc.UA.Application; using OpcLabs.EasyOpc.UA.Application.Extensions; using OpcLabs.EasyOpc.UA.NodeSpace; using OpcLabs.EasyOpc.UA.OperationModel; namespace UAServerDocExamples._EasyUAServer { class AlternateHostNames { public static void Main1() { // Obtain the application interface. EasyUAApplication application = EasyUAApplication.Instance; // Remove the own application certificate. This assures that, when needed, the server will create a new one with // the parameters we want and specify. try { Console.WriteLine("Removing the own application certificate..."); application.RemoveOwnCertificate(); Console.WriteLine("The application certificate has been removed."); } catch (UAException uaException) { Console.WriteLine("*** Failure: {0}", uaException.GetBaseException().Message); } // Instantiate the server object. // By default, the server will run on endpoint URL "opc.tcp://localhost:48040/". var server = new EasyUAServer(); // Add an alternate host name to the server (and its application certificate). server.AlternateHostNames.Add("mycomputer.mycompany.example"); // // Define a data variable providing random integers. var random = new Random(); server.Add(new UADataVariable("MyDataVariable").ReadValueFunction(() => random.Next())); // Start the server. Console.WriteLine("The server is starting..."); server.Start(); Console.WriteLine("The server is started."); Console.WriteLine(); // Let the user decide when to stop. Console.WriteLine("Press Enter to stop the server..."); Console.ReadLine(); // Stop the server. Console.WriteLine("The server is stopping..."); server.Stop(); Console.WriteLine("The server is stopped."); } } }
' This example shows how to specify additional host name(s) for the server. This is useful when the server is running on a ' computer that has multiple host names, and you want to make the server accessible under them. ' You can use any OPC UA client, including our Connectivity Explorer and OpcCmd utility, to connect to the server. ' ' Find all latest examples here: https://opclabs.doc-that.com/files/onlinedocs/OPCLabs-OpcStudio/Latest/examples.html . ' OPC client and subscriber examples in VB.NET on GitHub: https://github.com/OPCLabs/Examples-QuickOPC-VBNET . ' Missing some example? Ask us for it on our Online Forums, https://www.opclabs.com/forum/index ! You do not have to own ' a commercial license in order to use Online Forums, and we reply to every post. Imports System Imports OpcLabs.EasyOpc.UA Imports OpcLabs.EasyOpc.UA.Application Imports OpcLabs.EasyOpc.UA.Application.Extensions Imports OpcLabs.EasyOpc.UA.NodeSpace Imports OpcLabs.EasyOpc.UA.OperationModel Namespace _EasyUAServer Partial Friend Class AlternateHostNames Shared Sub Main1() ' Obtain the application interface. Dim Application As EasyUAApplication = EasyUAApplication.Instance ' Remove the own application certificate. This assures that, when needed, the server will create a new one with ' the parameters we want and specify. Try Console.WriteLine("Removing the own application certificate...") Application.RemoveOwnCertificate() Console.WriteLine("The application certificate has been removed.") Catch uaException As UAException Console.WriteLine("*** Failure: {0}", uaException.GetBaseException().Message) End Try ' Instantiate the server object. ' By default, the server will run on endpoint URL "opc.tcp://localhost:48040/". Dim server = New EasyUAServer() ' Add an alternate host name to the server (and its application certificate). server.AlternateHostNames.Add("mycomputer.mycompany.example") ' ' Define a data variable providing random integers. Dim random = New Random() server.Add(New UADataVariable("MyDataVariable").ReadValueFunction(Function() random.Next())) ' Start the server. Console.WriteLine("The server is starting...") server.Start() Console.WriteLine("The server is started.") Console.WriteLine() ' Let the user decide when to stop. Console.WriteLine("Press Enter to stop the server...") Console.ReadLine() ' Stop the server. Console.WriteLine("The server is stopping...") server.Stop() Console.WriteLine("The server is stopped.") End Sub End Class End Namespace
Copyright © 2004-2024 CODE Consulting and Development, s.r.o., Plzen. All rights reserved. Web page: www.opclabs.com
Documentation Home, Send Feedback. Resources: Knowledge Base, Product Downloads. Technical support: Online Forums, FAQ.Missing some example? Ask us for it on our Online Forums! You do not have to own a commercial license in order to use Online Forums, and we reply to every post.